home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 April: Mac OS SDK / Dev.CD Apr 97 SDK1.toast / Development Kits (Disc 1) / Macintosh Easy Open / Documentation / Developer / PowerPC / LowerToUpperCase.r < prev    next >
Encoding:
Text File  |  1995-09-11  |  3.3 KB  |  123 lines  |  [TEXT/MPS ]
  1. /*
  2.     File:        LowerToUpperCase.r 
  3.  
  4.     Contains:    Resources for LowerToUpperCase translator
  5.     
  6.     Copyright:    © 1994 by Apple Computer, Inc., all rights reserved.
  7.     
  8.     Modified 9/11/95, R.Silva
  9.     
  10.     Changed from LowerToUpperCaseScrap to LowerToUpperCase
  11.     Included file translation 
  12.     
  13. */
  14.  
  15. #include "Types.r"
  16. #include "MixedMode.r"
  17. #include "TranslationExtensions.h"
  18.  
  19. //___________________________________________________________________________________________________________
  20. //
  21. // Happy constants
  22. //
  23. #define kSignature                 'M&Ms'
  24. #define kComponentFileType        'thng'
  25. #define componentLocalID        0
  26. #define componentResID            130
  27. #define genericExtensionIcon    -16415
  28.  
  29. //___________________________________________________________________________________________________________
  30. //
  31. // The 'xlat' resource is a fat safe resource containing both 68K and PowerPC code.
  32. //
  33. #define uppComponentRoutineProcInfo    0x03F0
  34.  
  35. type 'xlat' as 'sdes';
  36.  
  37. resource 'xlat' (128) {
  38.     uppComponentRoutineProcInfo,                                    // 68K ProcInfo
  39.     uppComponentRoutineProcInfo,                                    // PowerPC ProcInfo
  40.     $$Resource(":Objects:LowerToUpperCase.68K", 'xlat', 128),    // Specify name, type, and ID of resource
  41.                                                                     //   containing 68k code
  42.     $$Resource(":Objects:LowerToUpperCase.pef", 'xlat', 128)    // Specify name, type, and ID of resource
  43.                                                                     //   containing a pef container
  44. };
  45.  
  46. //___________________________________________________________________________________________________________
  47. //
  48. // Tell the Component Manager about this component
  49. //
  50. resource 'thng' (128, locked) {
  51.     'xlat',
  52.     0,
  53.     kSignature,
  54.     kSupportsScrapTranslation + kSupportsFileTranslation + kTranslatorCanGenerateFilename,    
  55.     0,
  56.     'xlat',128,
  57.     'STR ',128,
  58.     'STR ',129,
  59.     'ICON',128
  60. };
  61.  
  62. resource 'STR ' (128, purgeable) {
  63.     "LowerToUpperCase"
  64. };
  65.  
  66. resource 'STR ' (129, purgeable) {
  67.     "Lower To Upper Case Translators"
  68. };
  69.  
  70. resource 'ICON' (128, purgeable) {
  71.     $"7FE0 07FE 8040 0201 8080 0101 807F FE01"
  72.     $"8000 0001 8000 0001 8000 3FF9 8000 1009"
  73.     $"8000 0809 8002 1009 8005 A009 8008 4409"
  74.     $"8010 2209 8020 1109 8044 0829 8882 0459"
  75.     $"8F19 9989 8844 2201 8820 4401 8811 8801"
  76.     $"8802 5001 8804 2001 8808 0001 8804 0001"
  77.     $"8FFE 0001 8000 0001 8000 0001 8000 0001"
  78.     $"7FF0 0FFE 0020 0400 0040 0200 003F FC",
  79. };
  80.  
  81. data 'PICT' (128) {
  82.     $"0084 FFFF FFFF 004A 0092 0011 02FF 0C00"            /* .Ñˇˇˇˇ.J.í...ˇ.. */
  83.     $"FFFF FFFF FFFF 0000 FFFF 0000 0092 0000"            /* ˇˇˇˇˇˇ..ˇˇ...í.. */
  84.     $"004A 0000 0000 0000 00A1 0096 000A 0100"            /* .J.......°.ñ.... */
  85.     $"0000 0200 0000 0000 0001 000A 0000 0000"            /* ................ */
  86.     $"0048 0090 0007 0000 0000 0008 000A 0023"            /* .H.ê...........# */
  87.     $"0000 002C 000C 0015 0948 656C 7665 7469"            /* ...,....ΔHelveti */
  88.     $"6361 0003 0015 0004 0100 000D 0048 002E"            /* ca.........¬.H.. */
  89.     $"0004 0000 0000 002A 3703 5570 7000 00A0"            /* .......*7.Upp..† */
  90.     $"0097 00FF"                                          /* .ó.ˇ */
  91. };
  92.  
  93.  
  94. //___________________________________________________________________________________________________________
  95. //
  96. // Finder information
  97. //
  98. resource 'BNDL' (128) {
  99.     kSignature,
  100.     0,
  101.     {
  102.         'FREF',
  103.         {
  104.             componentLocalID, componentResID
  105.         },
  106.         'ICN#',
  107.         {
  108.             componentLocalID, genericExtensionIcon
  109.         }
  110.     }
  111. };
  112.  
  113.  
  114. data kSignature (0) {
  115.     $"00"                 
  116. };
  117.  
  118. resource 'FREF' (componentResID, purgeable) {
  119.     kComponentFileType,
  120.     componentLocalID,
  121.     ""
  122. };
  123.